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CLUB NOTES 


The HOUSTON AREA APPLE USERS GROUP is 
an Apple user club, not affiliated 
with Apple, Inc., or any retail 
computer store. HAAUG is a member of 
the International Apple Core and 
supports its publications and 
purposes. General membership meetings 
are held on the second Thursday of 
each month in the rear chapel of 
Memorial Lutheran Church, 5800 
Westheimer, between Chimney Rock and 
Jungman Library, beginning at 6:30 
P.M. An additional general meeting is 
held at 2:00 P.M. the last Saturday of 
each month at the University of Texas 
School of Public Health in the Medical 
Center at 6905 Bertner at Holcomb. 
This meeting features tutorials, 
problem-solving sessions, and access 
to the HAAUG software library. The 
meeting is held in the main floor 
meeting room to the left of the 
entrance. Bring your Apples!! 
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Mike Kramer 
Brian Whaley 


President 
Vice Pres 


Treasurer Wally Edmiston 
Secretary Ruth Dill 
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Membership Robin Cox 
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713-668-8685 


The APPLE HOTLINE has been established 
to provide an easy means to learn of 
meeting topics, news, etc. It can 
also be used to obtain answers to 
puzzling Apple —- related questions. 

If you get a recording, leave your 
name, date, and time of day. You 
should get a return call within 24 
hours. 


TX 77339 


MEMBERSHIP INFORMATION 


Dues are $18 per 12-month pericd for 
regular memberships, $6 for students 
through high school where no adult 
member of the family is an Apple user. 
Please make checks payable to Houston 
Area Apple Users Group and mail to 
Robin Cox, 5401 Chimney Rock #607, 
Houston, TX, 77081. 


APPLE BARREL REPRINT POLICY 


Unless otherwise noted within the 
program or article, any original 
material published herein may be 
reprinted without permission by any 
non-profit Apple club, group, or 
newsletter, provided proper credit is 
given to the Apple Barrel and the 
author 


SPECIAL INTEREST GROUPS 


Members who share common interest are 
encouraged to join or form Special 
Interest Groups to more fully explore 
their fields. These groups meet 
separately from the regular meetings 
at times convenient for the members. 
If you would like to become involved 
in a special interest group, either 
call the HOTLINE or contact one of the 
club officers. Lists of members with 
specific interests can be generated on 
request from the HAAUG MEMBERSHIP 
SURVEY data base. 


SIG CHAIRMEN 


Business Rudge Allen 


CP/M Jim Huck 
Sci/Engg Mike Conway 
FORTRAN Lindsay Reed 
Stocks George Marsden 
Education Fred Yates 
FORTH Steve Knouse 


Page 1 


Personalized Pascal 


by La Ray Geist 


Welcome to Personalized Pascal! In the coming issues we will be disscussing 
topics that I hope will be of interest to intermediate and advanced Pascal 
Programers. These topics will be aimed at serious Pascal programmers 
intrested in building a library of basie tools to make their programming more 
enjoyable. Some of these tools will be stand-alone programs and some will be 
Procedures and/or Functions which may be placed in Library Units for use in 
other programs. 


This time we will build a stand-alone Program STARTUP which can be installed 
on the Root Diskette as *SYSTEM.STARTUP. The Apple Pascal System will 
automatically execute this program each time the System is Booted or 
re-initialized. STARTUP is a customized program which will "Prefix Volume #5" 
and initialize several items in systems which have optional 80 column displays 
and/or real time clocks. The program was designed for Apple Pascal Version 
1.1 on a two drive system with a VIDEX Videoterm 80 column display board and a 
Mountain Hardware clock, however the idea is the same for other optional 
hardware and the program should be general enough to be adapted. 


In order accomplish these initializations intimate knowledge of the Operating 
System including specific memory locations is required. The use of such 
information is only justified in programs which are designed to be executed on 
specific systems with identical hardware and system, software configurations. 
I feel a SYSTEM.STARTUP program qualifies for this special treatment. This 
program will have to be rewritten each time the hardware configuration or 
system software is changed. STARTUP was designed to operate under Apple 
Pascal Version 1.1, with a VIDEX Videoterm in Slot #3, and Mountain Hardware 
clock in any slot. Programs which read and write specifie blocks on disks and 
Poke numbers into specific memory locations are DANGEROUS so be careful. 
Remove this *SYSTEM.STARTUP from your boot diskette prior to trying out new 
hardware in Slot#3 or a new Version of system software. So much for the 
warnings - let's get down to business. 


The purpose for STARTUP is to automatically take care of those housekeeping 
chores that are desired each time the system is Booted or re-initialized. On 
a two drive system it is often convenient to Prefix Volume #5 so that you 
don't have to type in the Volume Name (or #5) each time you are refering to a 
file on disk Drive #2. It is also convenient to have the System Date set by 
the a clock each time the system is booted. The System Date resides in the 
first part of the Directory of the Boot disk and is read into memory on each 
initialization. Therefore the System Date needs to be updated both places. 
The Videx Videoterm 80 column display board has a rather fast full block 
cursor as its default, but the cursor is programmable by Poking control codes 
into memory locations on the Videoterm board. The cursor blinking rate can be 
slowed to half of its normal hyper-active rate and converted to an underline 
among other options. STARTUP takes care of all of these chores and prints a 
‘personalized welcome! message as well. 


Cont’d. 
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The following simplified description of the STARTUP summarizes the program's 
actions, 


Program STARTUP 
Prefix Volume #5 
Set Videx cursor (slow blinking underline) 
Read in the date from the Boot Diskette 
Check for Mountain Hardware clock (any slot) 
If a Mountain Hardware clock is there 
Read the time and date 
Update the date on the boot disk 
Update the date in memory, 
Welcome the Boot Volume to the Pascal system 
with a personalized message 
containing the current system date, 
If a Mountain Hardware clock is available 
continously update the time on the screen 
until a key is pressed 
Return to the Command level of the Pascal O/S. 


The two Assembly Languages routines for the Mountain Hardware clock were given 
to the now extinet UCSD Pascal User's Group by David Ramsey of Magicke 
Software, Inc. These appear to be excellent routines for reading the Mountain 
Hardware clock. David, Ramsey did an superb job of commenting. As you might 
expect these routines are significantly faster than the functionally 
equivalent Pascal routines which Mountain Hardware supplies to Pascal users of 
their clock. We should all thank David Ramsey for placing these fine routines 
in the public domain. These routines were copied from Vol5B:Ext/Clock.text 
with only one minor modification to the Function ClockSlot. As it was written 
it did not update the PUBLIC variable CS ( for ClockSlot). I merely added two 
statements to the original code PUBLIC CS just after FUNC CLOCKSLOT and STA 6 
just prior to the RETURN PASCAL. Point of Interest - these routines are 
available assembled and installed in a Libray Unit in Vol5B:ClockStuff. The 
Assembly Language Function KeyPress was published in Apple Orchard Winter 
‘80-81, The article was in the Contact section with no author listed. The 
KeyPress Function is a very general one. It is applicable to Apple Pascal 
Version 1.0 and 1.1 and is usable for Apples with or without a remote 
‘terminal. Most of the 80 column display cards available for the Apple look 
like a remote terminal to the Apple Pascal Operating System and the normal 
KeyPress function included in the Library Unit AppleStuff will not function 
with them (without patches to System.Apple). This EXTERNAL FUNCTION may be 
L(inked into any program needing the KeyPress Function by inserting the line 
"Function KeyPress : Booleam; External;" just below the VARiables section of 
the program heading block. After compling the Pascal text file, the KeyPress 
code file must be L(inked as described below. (If Segment Procedures are used 
in the program this ‘external function declaration’ may be placed just after 
the Segment Procedures.) 
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Instructions 


You will be exercising almost all of the Apple Pascal Language System to 
complete this project. You'll use the E(ditor to build both a Pascal program 
and the Assembly Language Procedures and Functions. The Pascal program will 
be C(ompiled and the Assembly Language routines will be A(ssembled into code 
files. The assembled code will be L(inked to the Pascal code. Finally the 
resultant code file will be T(ransfered to the boot diskette with the F(iler. 


I find it useful to use "Work Disks" which have the files required for 
Compiling, Assembling and Linking new programs. The following instructions 
assume that the "System Disk" in Volume#4 (Drive 1) contains SYSTEM.APPLE, 
SYSTEM.PASCAL, SYSTEM.EDITOR, SYSTEM.FILER, SYSTEM.LIBRARY, 
SYSTEM.MISCINFO, SYSTEM.SYNTAX, and SYSTEM.CHARSET and the "Work Disk" in 
Volume#5 (Drive 2) contains SYSTEM.COMPLILER, SYSTEM.ASSMBLER, 
SYSTEM.LINKER, 6500.0PCODES, and 6500.ERRORS. The file names listed in these 
instructions are suggested but not required, however the final file 
*SYSTEM.STARTUP must have this name and reside on the boot diskette so that 
the system can find and use it. 


From the Command level select 
F(iler and 

P(refix #5 

Qtuit the filer. 


E(dit the StartUp Pascal text 
W(rite or S(ave it as :STARTUP.TEXT 
C(ompile the Pascal text into :STARTUP.CODE 


E(dit the ExtClock Assembler text 4 
W(rite or S(ave it as :EXTCLOCK.TEXT 
A(ssemble EXTCLOCK into :EXTCLOCK.CODE 


E(dit the KeyPress Assembler text 
W(rite or S(ave it as :KEYPRESS.TEXT 
A(ssemble KEYPRESS into :KEYPRESS.CODE 


L(ink the Pascal host :STARTUP.CODE 
with the library :EXTCLOCK.CODE and 
with the library :KEYPRESS.CODE 
into :SYS.SSTRTUP.CODE 


Select the 
F(iler and 
T(ransfer :SYS.STRTUP.CODE,*SYSTEM.STARTUP. 


I hope you enjoy the automatic features of STARTUP as much as I do. In coming 


issues we will build a System.Library which contains routines to simplify 
user-to-Pascal communications within a Pascal program. 
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SNAVE @ SYSTEMS 


|AMES, Etc. 
8 aia Games (cont’d.) 


Ulysses ..... 34.95 25.95 

Amebe. uae Warp Destroyer : 29.95 21.95 
Oe ean Wizard and the Princess 32.95 23.95 
Apple Panic . Wizardry . 49.95 36.95 
Audex. . Zero Gravity 95 22.50 
39.95 31195 


Zoom Grafix 


BUSINESS 


Mystery House . 
Olympic Decathaion. 
Oo-Topos . 

Outpost . : 
Painter Pows 
Pascal Graph 
Pegasus I! 
Peeping Tor 
Photar_. 
Pool 1.5 
Race For Midnight 
Raster Blaster . 


With every $50 of pur- | Theinvoice Factory. 
4 . The Mailroom , 
chase you receive a free disk. Visicalc 3.3. 


Example: 
q Visiterm « 
$150.00 order receives 3 | Visitrend/Visiplo 
free disks. 


Geiling Zero . x : Address Book 49.95 39.95 
Computer Fo 2995 21195 ng ary 5 
Souter BG HB) SNAVESYSTEMShas the | Eerie BB we 
ounty Fair . i 
Graneton M 95 27:50 | Newest software at up to 40% | Gent Accounts Pay. 3000 19738 
rossfire . 21.95 i pet ir 2504 x 
Syborg 2495 | off the retail price. Just com- | Cont propery Mgt. .200..: 29000 19798 
Dark Forest . 22.95 j . DB Master . + 229.00 179.95 
David rs Midnight Magic 2698 Pare prices and you'll see | ppmaster Utility 00 72.95 
raw Poker . 1.95, 7 i 1 99. x 
Eliminator 1993 | SNAVE SYSTEMS is the only | BBMaster Utiity Pak2 00 15698 
Epoch.. § 25.95 I choi Desktop Plan II 00 239.95 
Ez Draw3.3. £096 158.85 | Leal: Choles: Form Letter + 100.00 "79.95 
‘alcons . 1.95 ., x Y 
mas 3198 We have a large selection | genera) edger 05 00 Sea ee 
.95 Payroll (Broder 1995.00 297.95 
Hadron oir 34.9% of software. Personal Filing Systei 95.00 71.50 
HiRes Computer Golf . PFS: Report + 95.00 71.50 
i-Res Football . Send for FREE catalog Super ioxtil B00 Hise 
es Soccer. Tax Preparer (1962): 2150.00 117.95 
Ri : The Apple Speller . 275.00 64.95 
Horizon Five FREE DISKS (imitea time only) The Data Factory + 150.00 117.95 
dawbreaker i The Dictionary + 9995 71.95 
The General Manager - 9571: 
Missle Defense . The Home Accountant 95 58: 
95 27: 
.00 
.00 
.00 
.00 
.00 
.00 
.00 


Sabotage . 
Shuffleboard 


Roach Hotel. 

Roadwork EDUCATION 
: ; 

Russki Duck If you don’t see it, Algebra. or 


just ask us! Crossword Magi 


Snack Attack | | 
Snake Byte ... 
Sneakers . 


SPECIALS 


RETAIL 


The Learning System 
The Star Gazer's Guide 
Typing Tutor....... 
USS. Constitution Tutor .2211 30 
Zenith Education System . |. 250.00 197.95 


Star Thief . 
Suicide. 

‘Super Disk Copy Ill 
Tasc Compiler. 
The Asteroid Field 
The Expediter I! . 
The Gauntlet 


TaPaddie (aces) . 
Threshold 


MISCELLANEOUS 


Track Attack Select-A-Port (accs) . - 59.95 45.95 
Twerps . TG Joystick (acs) + 59.95 45.95 
ultima : Joyport (ace: 7495 59.95 


8)... : 
Mamores bisks (box of 10) *: 


ALL PROGRAMS ON DISK 
SNAVE SYSTEMS Money Orders ¢ Certified Checks * Personal Checks 


Dept. D Allow 2 weeks for delivery * Add $2.00 for postage ($3.00 UPS Blue Label), 
foreign extra ¢ Illinois residents add 6% sales tax. 


Post Office Box 48957 . 
Niles, Illinois GO648 Prices subject to change without notice. 


Apple is a registered trademark of Apple Computer, Inc. 
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Program Startup; 


{ Personalized *SYSTEM.STARTUP program which will: 
1. Set the PREFIX to #5, 
2. Set the cursor of a VIDEX 80 Column display to an slow blinking underline, 
3. Check for a Mountain Hardware Clock and 
a. Update the system date on the BOOT DISK and in MEMORY, 
b. Write the current time to the screen until a key is pressed, 
4. Write a personalized welcome to the system on the screen. 


Const firstbyte = 20; {-Used by GetOldDate and PutNewDate } 
secondbyte = 21; { Used by GetOLdDate and PutNewDate } 
register = 10; { Used by SetVidex } 
nocursor = 50; { Used by SetVidex } 
underline = 104; { Used by SetVidex } 
videxaddr = -16208; { Used by SetVidex } 
lLowdate 21992; { Used by PutNewDate } 
prefix = -22008; { Used by SetPrefix } 

Type Pa = Packed Array[0..1] of 0..255; 
Magic = Record 

Case Boolean of 
true : (int : Integer); 
false : (ptr: “*pa) 

end; 

Daterec = Packed Record 

month : 0..12; 
day : 0..31; 
year : 0..100 

end; \ 

Var cs, 
high, 
low, 
month, 
day, 
hour, 
minute, 
second, 
millisecond : Integer; 
today, 
lastbootday : Daterec; 
name : String[10]; 
buffer : Packed Array [0..511] of 0..255; 
MHe Lock : Boolean; 
cheat : Magic; 

Procedure TimeStamp; External; 

Function ClockSlot : Integer; External; 

Function KeyPress : Boolean; External; 
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Function Peek ( addr : Integer ) : Integer; 
Begin { Peek } 


cheat.int addr; 
Peek := cheat.ptr°(0O] 
end; { Peek } 7 

Procedure Poke ( addr,data : Integer ); 
Begin { Poke } 
data := Abs(data Mod 256); 
cheat.int addr; 


cheat.ptr°[0] := data 
end; { Poke } 


Procedure CheckForC lock; 

Begin { CheckForClock } 
If ClockSlot < 8 then MHclock 
else MHclock 

end; { CheckForClock } 


True 
False 


Procedure SetVidex (code : Integer); 
Var secndaddr : Integer; 


Begin { SetVidex } ° 
secndaddr := videxaddr + 1; 
Poke (videxaddr, register); 
Poke (secndaddr,code) 

end; { SetVidex } 


Procedure GetOldDate ( Var olddate : Daterec ); 


Var i : Integer; 
ch : Stringl[1]; 
Begin { GetOldDate } 
Unitread ( 4, buffer,512, 2); { Read the first block of the Directory } 
high := ( buffer [ secondbyte ] ); { Get the date bytes into high and low } 
low := ( buffer [ firstbyte 1] ); 
With olddate do { Unpack the Date } 
Begin 
day := ( high MOD 2 ) * 16 + Low DIV 16; 
month low MOD 16; 
year := high DIV 2 
end; 
{ Extract the Volume name } 
ch := ' '; 
name thy 
For i 1 to buffer[6] do 
Begin 
ch[1] := Chr(bufferli + 6]); 
name := Concat (name,ch) 
end; 
name := Concat (name,':') 


end; { GetOldDate } 
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Procedure PutNewDate ( newdate : Daterec ); 


Begin { PutNewDate } 


With newdate do { Pack the date into two bytes. } 
Begin 
high := (year * 2) + (day DIV 16); 
low := month + (day MOD 16)*16 
end; 


buffer [firstbyte] (low); { Load the buffer with the date bytes. } 
buffer [secondbyte] := (high); 
Unitwrite( 4, buffer,512, 2,12);{ Write the buffer back out to the disk. } 
Poke (lowdate , low); { Update the date in memory. } 
Poke (lowdate+1,high) 

end; { PutNewDate } 


Procedure WriteDate (Date: DateRec); 
Begin { WriteDate } 
with Date do 
Begin 
Write(day:2,', '); 
Case month of 
1: Write('Jan.'); 
2: Write('Feb.'); 
3: Write('Mar.'); 
4: Write('Apr.'); 
5: Write('May '); 
6: Write('Jun.'); 
7: Write('Jul.'); \ 
8: Write('Aug.'); 
9: Write('Sep.'); 
10: Write('Oct.'); 
11: Write('Nov.'); 
12: Write('Dec.'); 
end {Case}; 
Write(' 19',year:2); 
end {with}; 
end; { WriteDate } 


Procedure SetPrefix; 


Begin { SetPrefix } 
Poke (prefix,2); { Set the "Prefix" to "#5". } 
Poke (prefixt1,Ord('#')); 
Poke (prefixt2,Ord('5')) 

end; { SetPrefix } 
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Begin {StartUp} 
SetPrefix; { Set the "prefix to #5". } 
SetVidex ( underline ); { Change the cursor to an underline. } 
GetOldDate (Lastbootday];{ Get the date from the boot disk directory. } 
Page (output); 
CheckForC Lock; { Check for a Moutain Hardware clock. } 

{ If a clock is available update the date on the disk and in memory. } 
If MHclock then 


Begin 
Timestamp; { Get the current date and time. } 
If (day <> lastbootday.ddy) or (month <> Lastbootday.month) then 
Begin 
GotoxXY (0,2); 
Write ('Volume ',name ,' was Last booted on '); 
Writedate (lLastbootday); 
If (month <= 6) and (lastbootday.month > 6 ) 
then Lastbootday.year := Lastbootday.year + 1; 
today.year := lastbootday.year; 
today.month:= month; 
today.day := day; 
Putnewdate (today) 
end 
end; 
{ Welcome the boot disk volume to the System. } 
GotoxY (0,10); 
Writeln('Your Message Goes Here '); Writeln; 
Writeln('welcomes ', name, ' to Apple Pascal [Version 1.1]'); Writeln; 
If MHclock then 
Begin 
Timestamp; 
Write('at ',hour:2,':',minute:2,':',second:2,' on '); 
today.year := Lastbootday.year; 
today.month:= month; 
today.day := day; 


Writedate (today); 
GotoXY ( 0,23); Write ('Press <Space Bar> to clear the screen.'); 
GotoXY ( 0,0); 
Write 
('Command: E(dit, Rlun, Flile, Clomp, Llink, Xlecute, Alssem, D(ebug,? [1.1]']; 
{ Turn off the cursor while updating the time to the screen. } 


SetVidex [ nocursor ); 
{ Keep writing the time to the screen until a key is pressed. } 
Repeat 
GotoXY (3,14); Timestamp; Write (hour:2,':',minute:2,':',second:2) 


until KeyPress; 

{ Turn the cursor back on as an undrline. } 
SetVidex ( underline ) 

end 

else 

Begin 
Write ('The current date is '); 
Writedate (Lastbootday); 
GotoXY ( 0,23); Write ('Press <Space Bar> to clear the screen.') 

end 

end. {StartUp} 


P ‘ 
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«FUNC KEYPRESS ,O ; 0 WORDS OF PARAMETERS PASSED 
JSS oR gi gaa ii ok ite deo io a tea ee i aa ee aa aa eee a a a ate ee a aaa 


FUNCTION KEYPRESS : BOOLEAN; EXTERNAL 


Contact section, Page 65, 


* 
7* 
;* 
;* Apple Orchard Winter 1980-81, 
a 
3;* Author Unknown 

* 

3 


; 

RETURN .EQU O ; STORAGE FOR RETURN ADDRESS 
CONCKVEC.EQU OBFOA FIXED ADDRESS IN BIOS 

RPTR -EQU OBF18 FIXED BUFFER POINTER 

WPTR -EQU OBF19 FIXED BUFFER POINTER 

VERSION .EQU OBF21 SYSTEM VERSION NUMBER 
KEYBOARD.EQU OCO00 KEYBOARD HARDWARE 

CONCK -EQU OFF5C WAY TO GET CONCK IN OLD SYSTEM 


STA RETURN 


STA RETURN+1 


PLA ; POP 4 BYTES STACK BIAS FOR FUNCTION 
LDA #0 

PHA ; RETURN MSB ZERO 

LDA KEYBOARD \ 

BMI TRUE 

LDA VERSION 

BNE $1 ; JUMP IF NOT ORIGINAL PASCAL VERSION 


$1 JSR CONCKVEC 3 CHECK CONSOLE 
$2 LDA RPTR 
CMP WPTR 3 CHAR IN BUFFER? 


TRUE LDA #1 ; YES, RETURN KEYPRESS = TRUE 
ALWAYS TAKEN 

NO, RETURN KEYPRESS = FALSE 
PUSH LSB RESULT 


EMPTY LDA #0 
KPDONE PHA 
LDA RETURN+1 
PHA ; RESTORE 
LDA RETURN 


RTS 
Note the use of the Local Lables $1 and $2 explained by R Haines in the 

same issue of Apple Orchard (see above) on page 35. 
"They provide an easy way to address locations that are a short 
distance away form the instruction. In addition they may be multiply 
defined, with only the most recent definition being usable. ... 
Because they may be redifined, local lables can be used in macros..." 
Qnly 21 local Lables. may he used at any one time. 

~END 
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B.I.S GENERAL.LEDGER.ON.LINE 


FAST EASY FLEXIBLE 


B.I.S is more than just a GENERAL LEDGER. It's a BUSINESS 
INFORMATION  |SYSTEM which can provide you with SELECTED information 
WHEN you need it. 


Information is. IMMEDIATELY available to assist you 
Management_ decisions. Wouldn't you like to know your SALE 
YEAR, MONTH, WEEK OR DAY. Or how about having a CASH REP 
of your bank accounts whenever you want it. 


B.I.S will change the way you do business. Now you can immediatel 
analyze, consolidate | and report the details of your busines. B.I. 
retains every entry forever, and there is virtually no limit to the 
number of entries you are allowed. 


B.I.S IS FAST . ' 
The machine language speed of B.I.S will save you time. 
You can ee for yourself how each entry changes the 
general ledger account balances. 


POSTING IS INSTANTANEOUS. 40 split entries can _ be 
completely sted in. en 26° seconds. REPORTING IS 
IMMEDIATE. f your wish, w in another 20 seconds, your 
ACE SHEET, can egin printing reflecting those 
entries. 


With B.I.S,_ i less. than 2 minutes xou could: ADD an 
account,. TER 10 item sale, €HANGE. an account 
description, a wire transfer, DELETE an account 
ENTER a check, plus SCROLL over 100,new accoun 

balances urn ‘the computer off if you _wish. 
Within next Minutes a complete BALANCE’ SHEET or 
PROFIT . reflecting these entries could be printed 
and reviewed. 


IS EASY TO USE 

The menus are simple and easy to use. Prompts will gui 
you along the way. The monitor is SCREEN-CODED with 
code which refers you to the proper place in 
reference manual. 


B.I.S is so simple that you could think of it as a SPIRAL 
NOTEBOOK. And if you Can write on a page in a spiral 
notebook, then you can make entries into B.I.S. 


B.I.S comes with ACCOUNTS & JOURNALS already set up. And 
our _HAND=HOLDING TUTORIAL MANUAL will describe your every 
single keypress needed to get you going. 


IS FLEXIBLE 

You may change 8B.I.,S into any gysten you_want, WHENEVER 
you want. B.1,S can handle ANY BUSINESS ACTIVITY. You are 
allowed to define your own business activity codes. 


You have full control over financial reporting with 
separate CUSTOM REPORT. GENERATORS. B.1.S_ allows you 
complete freedom in defining your ACCOUNT RANGES and 
reporting descriptions. 


You may define your own JOURNAL NAMES and create your own 
journals complete with account prompts. 


B.I.S general pedger. can_ handl 3 COMPLETELY 
b 


a 


e 
a 
e 


One . andle 

SEPARATE, set8S of books w ONSOL IDATING Gapabilities. 
You can even, use B.I.S_ to do your subsidiary accounts 
Feceivable and payable ledgers. It is truly a GENERAL 
LEDGER and can be used for any business purpose. 


B.I.S $295 is AVAILABLE from your local APPLE* DEALER or you can call 
BRODERICK & ASSOCIATES :8635 SHAGROCK : DALLAS , TEXAS : (214) 341-1635 


“Apple is a trademark of Apple Computers. Inc. 
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«TITLE "EXT/CLOCK - 


; 

;Mountain Hardware Apple Clock 
;Pascal Linkage routines 

31/80 by Magicke Software, Inc. 


14 May 1980 / 17:30" 


;David Ramsey 


i 
; TIMESTAMP procedure 


3 : 

;Uses public variable CS. CS may be declared and assigned in the calling prog 
jor found with the seperate function CLOCKSLOT. If CS = 8, the CLOCKSLOT 
;function didn't find a clock, and the routine aborts without modifying any- 


; thing. 


; 
;CLOCKSLOT function 


i 
;Finds clock....slot 


returned is used by TIMESTAMP...checks first three bytes 


;of ROM code on clock card, SHOULD be able to find all MH revisions... 


3 
;Zero page usage:00— 


Return address low byte 
Return address high byte 


Clock address low byte 

Clock address high byte 

Time parameter address low byte 
Time parameter address high byte 
Temporary storage used by GET 


; o1- 
; JUMP 02- JMP opcode 
; 03- 
5 04- 
;PARAM 05- 
;PARAM+1 o6- 
; TEMP 07- 
3 TEMP+1 O8- See above 

«MACRO POP 

PLA 

STA %1 

PLA 

STA %1+1 

» ENDM 

«MACRO FPOP 

POP #1 

PLA 

PLA 

PLA 

PLA 

~ENDM 

«MACRO PUSH 

LDA %1+1 

PHA 

LDA %1 

PHA 

~ENDM 
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«MACRO RETURN 
PUSH *1 
RTS 

«ENDM 


«MACRO GET 


ADC TEMP+1 


«MACRO CHECK 

LDA %1 

SEC 

SBC #28 

BPL $2 

BMI $3 
$2 LDA %1 

SEC 

SBC #1 

STA %1 
$3 

«ENDM 


«NOPATCHLIST 
PASCAL .EQU Q ;Pascal return address storage area 
«FUNC CLOCKSLOT 


«PUBLIC CS ; Mod L Geist 
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FPOP PASCAL 


LDA #0 
STA 03 
LDA #0C2 jInitial slot 
STA 04 jWe'LL start looking in slot #2 and proceed 
jto slot 7. It can't be in some of the slots 
jbut it's easier to scan everything than to 
jhandle special cases, right? 
LOOPO LDY #00 ;Index 
LDA (03),Y ;Get byte 
CMP #08 ;Check for first value 
BEG SECON ;It matches...check for second 
NOPE INC 04 ;Didn't match...increment base 'register 
LDA 04 ;Load slot # 
CMP #0C8 ;Finished checking for clock? 
BNE LOOPO ;Nope, Loop back 
JMP THRU 3 (sigh) 
SECON INY iIncrement counter for second byte 
LDA (03),Y 
CMP #078 
BEQ THIRD ;Second byte macthes...this may be it! 
JMP NOPE jDidn't match...try again... 
THIRD INY ;We've made it this far! 
LDA (03),Y ;Load.... 
CMP #02C ;Compare... 
BEQ THRU 3Found it!!! 
JMP NOPE ;So close! Damn the fates! 
THRU LDA #0 
PHA 
LDA 04 . 
SEC 
SBC #0C0 
PHA 
STA CS 3 Mod L Geist 


RETURN PASCAL 


+PROC TIMESTAMP 
;Note that a JMP CXO0 RTS has been set up at location $02. This is for 
gan ‘indirect JMP' trick. The clock routine will be called by a JSR 02 
;command when needed.... 


; 

jNote: If the ClockStuff unit is used, the variables appearing in the 

Hi -PUBLIC declaration must NOT be declared in the program, Lest the 
;compiler report an ‘identifier declared twice' error. However, if these 
;routines are L)inked in manually, the variables MUST be declared. They are 
jof type INTEGER. 


3 
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PARAM 
TEMP 
BASE 
SAVE 
csw 
KSW 


CONT 


STASHEM 
$0 


+PUBLIC MONTH ,DAY ,HOUR , MINUTE, SECOND ,MILLISECOND ,CS 
«EQU oc 38 BYTE RESERVED AREA 
LDA CS 3Get CLOCKSLOT 


ADC #0CO jAdd offset 


LDA #40 ;JMP opcode 


STA PARAM+1 4 
LDA 04 
AND #0F ;Zero upper 4 bits 


ASL A sMove lower nybble to upper nybble 


LDX #0 

LDA (PARAM,X] ;Next four instructions are ‘arcane things' 
CLI ;(interrupt parameters, etc.) necessary for 
LDA 04 ;the clock to be read 

STA 039 


i 

;HERE WE GO... 

3 

JSR INITPTR 

LDA (BASE ,X) 

STA SAVE,Y 

JSR INCPTR 

BPL $0 

i 

;NOW ITS ALL SAFE & SOUND! 
JsR 02 ;This gets the time 


;RESTORE IT ALL... 


; 
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RESTORE JSR INITPTR 
$0 LDA SAVE,Y 
STA (BASE ,X) 
JSR INCPTR 
DEY 
BPL $0 


31 HOPE THAT WORKED! 


; 
GET 0286 ,SECOND 
CHECK SECOND 
GET 0289 ,MINUTE 
CHECK MINUTE 
GET 028C ,HOUR 
GET O28F ,DAY 
GET 0292,MONTH 


LDA #0 ;Now for the fun part- milliseconds! 
STA TEMP+1 
LDA 284 


SBC #0B0 

STA TEMP ; TEMP now set 

ASL A ;Must multiply by 100, which we accomplish by 
ASL A ;muLltiplying by ten TWICE. 

ASLA ;Three shift lefts multiply by eight- 


ADC TEMP ;e.eand two adds make ten 
STA TEMP ;Store hundreds of MSECS times ten 


LOOP ASL TEMP ;Now we do it again 
ROL TEMP+1 
DEX ;Decrement counter 
BNE LOOP ;Finish three ASLs 
LDX #2 

Loope CLC 


ADC #0 ;Adding an 8 bit value to a 16 bit word... 


LDA 283 ;Get. tens of msecs 


ASL A ;Look familiar? 
cLco 
ADC 283 
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ADC 283 
STA 283 
LDA 282 


SBC #0B0 


ADC 283 
ADC TEMP 
STA MILLISECONDS 
BCC FINI 
ING TEMP+1 
FINI PoP KSW 
PoP csw 
LDA TEMP+1 
STA MILLISECONDS+1 
BYE RETURN PASCAL ;Finished! 


INITPTR LDA #0F8 
STA BASE 
LDA #07 
STA BASE+1 


INCPTR LDA BASE 


SBC #080 

STA BASE 

BCS INCRTN 

INC BASE+1 
INCRTN RTS 


HAAUG: EXTCLOCK . TEXT 


MEETING NOTICE 
On Saturday, March 27, Lee Gilbreth will discuss the evolution 


and use of File Cabinet, the popular public domain data base 
program. The presentation will begin at approximately 3:00 P.M. 
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THE TAX MANAGER by TASO from Micro Lab 
A Review by Ruth Dill 


It’s tax time again, and one of the best uses we 
can make of our Apples is putting them to work on our taxes. 


THE TAX MANAGER on the whole is relatively easy to 
use and performs its functions efficiently. It provides a Tax 
Guide which allows the user to answer pertinent questions after 


completion of which the tax forms and schedules he will need are 
listed. 


A Tax Checklist can be used to enable you to take 
full advantage of the deductions you are entitled to. The menu 
lists: 


1. Taxable Income Items 

2. Items Not Taxable 

3. Business or Frofessional Deductions 
4. Farm Deductions 

S. Deductions Toward Adjusted Gross Income 
6. Investment Tax Credit 

7. Energy Tax Credit Items 

8. Itemized Deductions 

9. Non-deductible Items ‘ 

10. Review an Entire Category 

99, Return to Tax-Manager Menu 


Through option 10, you can review an entire 
category, or, if you know what item you are looking for you can 
do a keyword search. 


From the Tax-Manager Menu, you may list the forms 
you will need in sequence and will then be able to go from one 
form to another without returning to the menu or you may select 
each form individually from the menu. Data is entered onto the 
form. If the form or schedule is too large to be shown on the 
Apple screen at one time, it is divided into "pages" which are 
shown in sequence. You may go forward to the next page or back 
up to the last page by utilizing command keys listed in the 
control panel. 


Tax Manager automatically recalculates amounts 
each time you enter data, for the page you are viewing as well as 
for all other items on that page affected by the new data. The 
recalculation also links the correct amounts from schedule to 
schedule/schedule to form. You do not have to go through each 
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Memory Expansion for Apple® 


Computer Data Services proudly announces 
new Saturn products for your Apple II. 


>— 
128K RAM 
ALL FOR ONLY 


$599 


($3 shipping, US) 


—<q 


Our newest product. Fully compatible with Saturn’s 32K 
RAM board, 16K RAM cards and language card. 


Includes 5 comprehensive software packages: 
. MOVEDOS (relocate DOS) 

. RAMEXPAND (for Applesoft®, Integer 
. PSEUDO-DISK for DOS 3.3 or 3.2 

. PSEUDO-DISK for CP/M® 

. PSEUDO-DISK for PASCAL 


aPrwn— 


oa 
64K RAM 
$425 © 


ea 
32K RAM 


STILL ONLY 


$239 


—< 


A medium range memory expansion board which can be 
upgraded to 128K at a later date. (Upgrade kit sold for 
$175). Includes all 5 software packages offered with the 
128K board. 


($3 shipping, US) 


—q 


The old favorite for Apple users. Includes the first 3 
software packages (above) with CP/M® and PASCAL 
pseudo-disks now offered as options ($39 each). 


($3 shipping, US) 


Expand memory available to Personal 
V C- E X P A N D Software's 16 sector VisiCalc®. Add 32K, 


MEMORY 
EXPANSION 
FOR VisiCalc® 


ONLY $1 00 


Dealer Inquiries Invited 


64K, or even 128K to your present 
workspace (even if you already have a 16K 
card in use!) with this program plus one or 
more Saturn boards. Simple to use. 


($2 Shipping, US) 


Computer Data Services sass 
P.O. Box 696 
Amherst. NH 03031 
(603) 673-7375 


Ss 
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form and schedule individually to ensure that the new 
data entered is correctly calculated and reflected throughout. 


Taxpayers are saved by name to the data disk or 
disks and you can switch from one disk to another. Each time you 
switch disks the taxpayers saved on that disk are displayed. 


There are two ways to obtain printed output. 
Control PF allows you to print a copy of the form displayed on the 
screen. Selecting "Frint Tax Forms" from the Tax Preparation 
Menu will print out facsimile forms in a format acceptable for 
filing with IRS, EXCEPT FOR FORM 1040! The IRS requires that 
Form 1040 be printed on a preprinted form. the print option 
allows you to print the data for the 1040 on a preprinted Form 
1040, or you may print out the facsimile form 1040 and copy it to 
the preprinted form. If you plan to submit the printouts of the 
facsimile forms and schedules, the IRS requires that they be 
submitted on quality, lined, machine paper. 


A sample disk named "Uncle Sam" is included in the 
package for you to play around with and to familiarize you with 
the program. 


I did encounter some difficulties, however, and 
these were: 


1. It is necessary to type somewhat slowly when 
making entries otherwise letters will be skipped. A number of 
times I had to correct omissions due to this problem. 


2. In Schedule C, the program does not figure any 
depreciation. You are referred to their ASSETS MANAGER program . 
This information is not difficult to figure and type in. However, 
it seems to me that having bought a program to figure the tax 
return, it should perform as expected. Form 4562 which covers 
depreciation on equipment bought during 1981 was not included 
although there were pages in Schedule C under Depreciation to 
cover these items. 


3. Depreciation for equipment such as Apple which 
would be listed on Form 2106 - Employee Business Expenses is not 
deductible unless all deductions are itemized. Tax Manager 
calculates tax both ways and uses the method which is most 
advantageous. However, if it takes the standard deduction, it 
does not disallow the items on Form 2106 which are not allowed 
due to taking this deduction. This should be watched for if you 
use 2106. 


4. When you have completed the forms and select 
“Print Tax Forms", the program asks if you want to save this 
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return. You input "Y", of course, then you are told to turn to 
Disk Side #2 and press Return. You are supposed to get a print 
menu at this point. However, what I got was the Tax Preparation 
Menu again. In order to get the print menu, you have to press 
Reset, which, of course, clears the program from memory. Then 
you reboot with PR #6. This gives you the print menu, which 
indicates that there is no current taxpayer in memory. You have 
to "Select a New Taxpayer",.which would be the name of the person 
whose return you were just working on, and wait while it is 
reloaded into memory. Then you can select the forms in the 


sequence you prefer and print. This works but it is awkward and 
time consuming. 


Other than the problems mentioned above, I found 
that the program worked well and I had fun running it. If you 


try it and find any other differences, I would appreciate hearing 
from you. 


Ruth Dill 
204 N. Main St. 
y Highlands, TX 77562 


672-4317 (Work) 


APPLE 8-BIT 8-CHANNEL A/D SYSTEM 


> 8-BIT RESOLUTION > ELIMINATES NEED TO WAIT FOR A/D CON- 


ON BOARD MEMORY: EN 

> 7 

(Just peek at data) > aera TOTALLY TRANSPARENT 

> FAST CONVERSION - >» FULL SCALE INPUTS CAN EASILY BE 
(.078 ms per channel). CHANGED BY USER. 


APPLIED ENGINEERING’S A/D board is a breakthrough product for all APPLE owners 
giving real world data at a really affordable price. Diverse applications include monitoring 


of: 


TEMPERATURE WIND SPEED...... WIND DIRECTION.... 
. LIGHT INTENSITY PRESSURE : SOIL MOISTURE 


CONTRIBUTED PROGRAMS ARE DISTRIBUTED FREE TO ALL A/D OWNERS IN OUR NEWSLETTER. 


S d 1 t t MASTER CHARGE & VISA WELCOME 
ee your dealer or Contact - 

APPLIED ENGINEERING Weta) ase 20at 
P.O. BOX 470301 7:00 AM - 11:00 PM 7 DAYS A WEEK 
DALLAS, TEXAS 75247 $ 129 APPLE PERIPHERALS ARE OUR ONLY BUSINESS 
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THE HAAUG-HAM, by Ed Seeger, WB5PTW 


With increasing numbers of ham radio operators joining HAAUG 
there are more and more questions arising about how to use the 
Apple as a part of an amateur radio station. I've been a ham 
operator for over twenty years now, and an Apple owner for three- 
and-a-half. And while I can't claim to have "seen it all", I 
have tried to pay attention to who's doing what, and where and 
how. Let me tell you what.I think I know so far, and I'd welcome 
your own information and observations to be added to mine. 


Many of you have already see Chris Galfo's set of programs 
for video-displaying CW, RTTY and SSTV. ( That's Morse code, 
Radio TeleTYpe and Slow-Scan TeleVision, respectively, to you 
non-hams who are reading this. ) Dr. Galfo, WB4JMD, produced 
this nifty software on cassettes and sold them out of his home 
back in 1978 or '79. I bought those programs and the accompany- 
ing documentation. Unfortunately, the packages seem to be out of 
print these days, which is a shame, because they do a fine job of 
turning the dah-di-dah-dit dah-dah-di-dah,. the deedle-deedle- 
deedle and the eight-second buzz saw tones into TV displays that 
even the non-ham can readily appreciate. 


I still use Galfo's software, but run it from a DOS 3.3 disk 
these days. The Morse package requires a little hardware to turn 
the dits and dahs from your speaker into the five volt TTL levels 
the Apple game paddle connector can handle. The machine language 
software takes it from there. I never did get the circuit 
working that was included in the documentatidn, however. But I 
have found another solution using my RTTY terminal unit. More 
about that below. 


Transmitting code is easier. The program accepts text from 


the Apple keyboard -- it even remembers your stock phrases and 
calls them up on command through a set of what are in effect 
"keyboard macros" -- and squirts the text out ready for direct 


connection to your keying circuit. If you are impolite enough to 
speak while being spoken to, you can store your replies ina 
memory buffer -- this is called a "live keyboard" -- and 
automatically empty your ramblings over the air without further 
intervention on your part. There's even a Times Square-like 
moving marquee that shows your text traveling from right to left 
and onward and upward into the ether. If you think programs 
supplied on cassettes must have been truly Dark Ages material, 
you are wrong. This stuff still impresses, even in these modern 
times of Apple DOS and expensive disk-based software. 


Displaying and transmitting radio teletype is done in much 
the same fashion. You do need some kind of a terminal unit to 
translate the sweet sounds of Baudot into voltages the Apple can 
in turn translate into even sweeter ASCII. I confess I overdid 
things a bit and went whole-hog for a spiffy IRL FSK-1000 
terminal unit, with all three shifts, autostart, and a contin- 
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uously-tunable shift for people who know what to do with features 
like that. I don't, but it's there for when I find out! It only 
costs 100+10*RND(9) percent more to go first class. But all you 
really need is a no-frills demodulator. Fletcher makes one and 
circuits abound if you're up to a little home brewing. 


I have been amazed at the number of hams out there who are 
doing computerized RTTY. A lot of them are using Apples and some 
are all the way into stand-alone dedicated units; why, I don't 
know. After you're done hamming, what can you do with the 
things? At least with a true computer, you can keep recipie 
files, or whatever those tacky articles in the airlines' in- 
flight magazines think you and I do with our machines. Even 
more hams are running the TRS-80. Although I have not begun to 
send RTTY myself, I do a lot of "reading the mail" and it doesn't 
take long to find out who's using what equipment. 


Price considerations aside, the popularity of the Radio Shack 
in the ham shack seems to derive from the success of the 
Macrotronics, Inc., "Terminall" device and its predecessors. Dr. 
Ron Lodewyck, N6EE, and Wayne Reindollar developed this 
hardware/software package in the late 1970's and marketed an 
Apple version as model A-650, the TRS-80 version as the M800 with 
M80 interface. Apparantly, the TRS-80 users out-demanded the 
Apple users and the A-650 was discontinued, although Amateur 
Electronic Supply till has a few on the shelf. 


I bought the documentation for that early device and judged 
the whole setup to be terribly unwieldy to use, certainly not as 
manageable as WB4JMD's software with a good outboard terminal 
unit. Admittedly, the A-650 was more powerful, with such 
features as optional line numbering and software switching of 
mark and space tones that Galfo had not provided. On the other 
hand, Galfo's project was undertaken in the days when many Apples 
had only a scant 8K of memory ( rev. 6 and earlier ) and it cost 
a bundle to upgrade to even 16K. Lodewyck, whose design trailed 
Galfo's by only a matter of months -- and which was, by the way, 
also cassette-based -- Lodewyck was able to take advantage of the 
availability of cheaper RAM and so his package assumed and 
required 16K. Naturally you can do a lot more in twice the 
memory. 


Macrotronics has not sold a system for the Apple ham for some 
time now. However, I recently telephoned them and learned that a 
"Terminall" for the Apple is expected to be released "soon". As 
my mother used to say to me as she was on her way out of the 
house, "don't expect me till you see me". The new unit is 
reported to be a great improvement over the original A-650 and 
will undoubtedly as a minimum match feature-for-feature the 
existing TRS-80 package. 


Take a look at Macrotronics' ad on page 95 of the March, 
1982, "QST" magazine to see what Rat Shack owners have that we do 
not. I do hope our version will provide for saving received text 
to disk, or even allow us to prepare text ahead of time in a DOS 
file and call it up on demand. Such capability is a virtual sine 
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qua non for advanced RTTY operators, who have for years used 
punched tape for storage of artwork and brags. NOTE to non-hams 
who have read this far: BRAG is not a new DOS command for 
machine language; it's merely a canned "mine's bigger than yours" 
rap that tells the ham on the receiving end what equipment I'm 
using and dares him to have as expensive a station! You know, 
"ask me about my grandbaby". 


Other hams among us have had reasonable success with the 
"Radcom Plus+" Amateur Radio Communications Package, built to the 
design of Alex M. Massimo, AF6W, in San Diego. Like the 
Macrotronics approach above, Radcom Plus+ is a software/hardware 
system, with a terminal unit demodulator built onto an Apple slot 
#2 card. The software, which at least as first released required 
so-called "Interger" (sic) BASIC, was developed by C. H. Galfo, 
WB4JMD! During his disappearance, Galfo had considerably 
upgraded his original program. As supplied with the Radcom 
board, it now was able to load and save text to and from disk and 
memory buffer, log contacts to disk, repeat the entire previous 
transmission and gave on-screen tuning indicators. Again, the 
key was cheap RAM, now that just about everybody had a 48K coffee 
warmer plugged in. 


But there was a catch, and Macrotronics is currently guilty 
of this also. What about the many, many hams who have been 
around a while and already have money tied up in a terminal unit? 
Why should we have to buy another TU, this one on an Apple 
peripheral card, just to be able to run good ham software? 
Massimo's product is an inseparable package, as is Lodewyck's. 
Love me, love my tractor. We know from Galfo's first programs 
that CW and RTTY software does not have to be hardware-dependent. 
Sure, it's nice for the beginner who wants an easy way to break 
into computer hamming and RTTY at the same time; he or she is 
relieved not to have to make decisions about which terminal to 
buy or which Morse decoder to wire up. ( I gave up on Galfo's 
circuit and finally just adjusted my TU to put out TTL voltage 
swings when I tuned over top of a CW station. ) 


There are two possible answers. The truly creative ham- 
computerist will rip off a copy of the Massimo-Galfo software, 
disassemble it while searching for the I/O routines aimed at that 
card in slot #2, and will redirect I/O through, say, the game 
port or maybe the cassette jacks, which just lie there unused 
anyhow after the first month with your Apple. Surely this is 
theoretically possible, and the new storing and logging features 
of the software make the effort attractive, although illegal. If 
Massimo is sharp, he's already working on just such a possibili- 
ty. 


A second approach lies within a small ad in a recent issue of 
"Micro", the 6502/6809 journal. It's the "Egbert RTTY Program". 
This is a $40 program that demodulates RTTY in software! That's 
right, no black box with mark-space indicators, no current loop, 
no oscilloscope ( and probably no possibility of attaching one, 
either ). I've put my money out (what, me disassemble somebody's 
software?) and have received it. I will report on it in an 
upcoming issue of "Apple Barrel". 
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According to the blurb, Egbert's program uses the cassette 
ports in direct connection to the transmitter/receiver. The 
Apple both generates and decodes RTTY tones at 60, 67, 75 and 100 
words per minute Baudot and 110 baud ASCII. A tuning indicator 
is accomplished through one of the hi-res screens. Received text 
and art can be saved off to disk, there is automatic CW identifi- 
cation, and more. $39.95! I'11 let you know, but be warned that 
if it's good you'll have to mail away for your own copy. My ham 
call is coded in there for automatic CW identification! 


GAME CONTEST RESULTS 


The game contest held at the Saturday Meeting on February 27 was 
a big success, thanks to the efforts of Susan Wettling. The 
contest was limited to youngsters through high school, with two 
groups, 4 through 11 and 12 through 18. Three games, Apple 
Panic, Snack Attack, and Space Eggs were set up on four Apples, 
with each participant permitted two chances on each game. The 
results of the competition are as follows: 


Junior Division } 
Michael Rogge, age 10, Apple Panic, score 13980 
Steven Otillar, age 11, Snack Attack, score 2900 
Susan Scheuer, age 10, Space Eggs, score 1610 


Senior Division 
Chris Myers, age 16, Apple Panic, score 107000. 
John Coolidge, age 15, Snack Attack, score 3798 


Special thanks to Susan ,the judges, DeWayne Van Hoozer for 
loaning his custom-painted red Apple, and the donors of the 
prizes, Moore Business Center, Computer City, Computer Technique, 
Computercraft, and the Compushop. 


APPLEFEST /HOUSTON 


At Applefest *82 hundreds of manufacturers, distributors, and 
dealers will showcase the entire spectrum of Apple-compatible 
products including computers, components, peripherals, plug-in 
cards, publications, software, etc. for office, home, and 
school. This year Applefest will be held in Houston at the 
Albert Thomas Convention Center November 19-21 from 1 P.M to 10 
P.M. daily. Admission charge will be $5 per day, $8 for 2 days, 
$12 for 3 days. Plan to attend!! 
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ANOVA by Dynacomp 
A Review by Nick Fotheringham 


Analysis of variance (ANOVA) is a powerful statistical tool 
designed to test the equality of means of several samples. 
For example, in an agricultural experiment it could be used 
to test whether or not corn plants grew at the same rate in 
different test plots, and whether different fertilizer or 
water treatments applied to these plots significantly affect- 
ed the rates of growth. 


The ANOVA package offered by Dynacomp is supplied on a DOS 
3.2 disk which. can be "“muffined" to a 3.3 version. The menu 
offers five options: (1) an unbalanced, replicated, one-way, 
n-level ANOVA, (2) a balanced, replicated, 2 factor, n-level 
ANOVA, (3) a balanced, replicated 3-5 factor, n-level ANOVA, 
(4) a balanced, replicated, n-factor, 2 level ANOVA, and (5) 
and an editing routine. Data may be entered from the key- 
board or from a disk, although data from a disk must have 
been stored with a precisely defined structure, which is only 
likely to exist if the data file had been created by the 
ANOVA package during a previous session. The program length 
is about 12K bytes, and it is designed to run on a 16K or 
larger system. 


I have tested the one-way and 3-way procedures using textbook 
data sets. The decimal points in the mean squares for the 
one-way ANOVA had been moved, apparently to provide a better 
output format, and thus the output was not,correct. The 
lengthy output for the 3-way ANOVA raced passed my screen 
without benefit of a stop every 24 lines. Thus it required 
several runs for me to observe that the output was correct. 
I found the package disappointing in its dependence on 
balanced designs for all but the one-way ANOVA, its lack 
of customized output, and its rigid disk file structure 
requirements. Fortunately, once "muffined", the program can 
be listed and modified. I immediately enhanced my version by 
adding 2- and 3-way unbalanced ANOVA's to the menu. It 
also is a reasonably simple enhancement to enter an array of 
factor names to the input so that the output can be printed 
using "DOSEAGE", "SEX", "AGE", etc., instead of “FACTOR 1", 
"FACTOR 2", etc. The disk file generated by the program is a 
sequential file of data points containing almost no informa- 
tion about its own structure. Thus it is advisable to take 
ample notes whenever data is stored by the program to ensure 
that it can be recovered properly. 


Finally, error traps appear to be very limited in this 
program. Most wrong guesses as to the input requested by the 
program resulted in a rude termination with no interpretable 
message. 
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** WANT / DON’T WANT ADS &* 


For sale: Heuristics Speech Lab, $100. Call DeWayne Van Hoozer 
at 668-8685 


For sale: Apple Silentype Thermal Printer with interface, #300. 
APF 9" B&W Monitor, #75. VISICALC 3.2, manual — $50. 
Call David Dodd evenings at 893-5869 


For sale: Teletype ASR-43M Printer Terminal, $450. 300 Baud 
Modem, $100. Call Edwin Miller at 664-5216 


For sale: T.I. 59 Calculator with extras, $170. Call J. Totten 
evenings at 644-4824 


For sale: Time II Clock card by Applied Engineering, $90. 


Wanted: Mtn. Hardware format clock card. Call Paul Maddock at 
783-1521. 
Wanted: Apple II+, Disk drive, color monitor, Dow — Jones, 


modem. Call Merrill Siegel at 467-9826 


Wanted: Epson MX-80 or equivalent, new or used. Call Fred 
Follse during the day at 222-0322. 
4 


APPLE MUSIC SYNTHESIZER BREAKTHROUGH 


« COMPLETE 16 VOICE MUSIC SYNTHESIZER ON ONE CARD, JUST PLUG IT INTO YOUR APPLE, CONNECT THE 
AUTO Cote SUPPLIED) TO YOUR STEREO AND BOOT THE SUPPLIED DISK AND YOU'RE READY TO ENTER 


* IT’S EASY TO PROGRAM MUSIC WITH OUR “COMPOSE” SOFTWARE. YOU’LL START RIGHT AWAY AT 
INPUTTING YOUR FAVORITE SONGS. OUR MANUAL SHOWS YOU HOW, STEP BY STEP. THE HI-RES SCREEN 
SHOWS WHAT YOU'VE ENTERED IN STANDARD SHEET MUSIC FORMAT. 


¢ WE GIVE YOU LOTS OF SOFTWARE. IN ADDITION TO “COMPOSE” AND PLAY PROGRAMS, THE DISK IS FULL 
OF SONGS READY TO RUN. 


* FOUR WHITE NOISE GENERATORS (GREAT FOR SOUND EFFECTS). 
* PLAYS MUSIC IN TRUE STEREO AS WELL AS TRUE DISCREET QUADRAPHONIC. 


¢ ENVELOPE CONTROL (VOLUME) 


* WILL PLAY SONGS WRITTEN FOR ALF SYNTHESIZER (ALF SOFTWARE WILL NOT TAKE ADVANTAGE OF ALL 
THE FEATURES OF THIS BOARD, THEIR SOFTWARE SOUNDS THE SAME ON OUR SYNTHESIZER). 


¢ AUTOMATIC SHUTOFF ON POWER-UP, OR IF RESET IS PUSHED. 
¢ MANY, MANY MORE FEATURES. 


ALL ORDERS SHIPPED SAME DAY MASTER CHARGE & VISA WELCOME 
SEND $159.00 CHECK OR MONEY ORDER 
(TEXAS RESIDENTS ADD 5% SALES TAX) 


APPLIED ENGINEERING (214) 492-2027 
P.O. BOX 470301 7:00 AM - 11:00 PM 7 DAYS A WEEK 
DALLAS, TEXAS 75247 APPLE PERIPHERALS ARE OUR ONLY BUSINESS 
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APPLE III NEWS 


Three utility programs for the APPLE III have been added to the HAAUG 
software library. One is the old standby, FILE CABINET, which has been 
adapted to the APPIE III. With the increased memory and execution speed of 
the Three this is an excellent freebe. A second program is an improved 
version of the APPIE II emulation diskette. This version of the emulation 
diskette allows you to configure the RS 232-C output to a number of 
printers including adjusting the baud rate, odd or even parity, etc.. It 
increases the utility of the emulation mode significantly. The third 
diskette has a self-documented utility for converting APPIE II DOS 3.3 text 
files to APPLE III SOS text files. Many APPIE II basic programs can be 
converted to the APPLE III and run with minimum changes with this utility. 


There are a number of pre-packaged programs now available for the APPLE 
III at the local stores. There are two word processing packages: WORD 
JUGGIER by Quark Engineering and APPIE WRITER III from Apple. APPLE WRITER 
III is signficantly different from the original APPLE WRITER. It will 
interface with VISICALC so VISICALC screens can be included in your text. 
It will also interface with a MAIL LIST MANAGER program also available from 
Apple Computer Co.. Additional programs include PASCAL UTILITIES, a set of 
commonly used programming routines which can be used with APPIE III Pascal. 
A simple text editing program for program development called SCRIPT III. A 
modem utilities program, APPLE ACCESS III, is also available. This latter 
program adds the ability to interface the APPLE III with a modem and use 
the various remote data bases such as The Source, Dow Jones, etc.. This 
utility also has the capability of uploading and downloading text files and 
will allow the APPIE III to be connected to mainframed etc. by configuring 
for various terminal modes. APPLE III BUSINESS GRAPHICS will plot data 
input from the keyboard or from VISICALC, Basic or Pascal files. In 
addition to supporting Qume and Silentype printers, APPLE III BUSINESS 
GRAPHICS will output to Hewlett-Packard and Houston Instrument plotters. 
DESK TOP PLAN III from Personal Software is also available. This is a 
powerful financial reporting system which has been available for the APPIE 
II for several years. The PFS database Management system is also available 
for the Three. While this list is not complete, most of these products 
have shown up in the last few weeks. It appears that products for the 
APPLE III are begining to hit the stores in a big way. 


APPLE III owners who sent in their warrenty cards should be receiving a 
package from Apple Computer announcing the latest sofware enhancements. 
All system software including System Utilites, Visicalc III, and Business 
Basic have been upgraded to Versions 1.1 to use the improved SOS 1.1. 
Revised manuals are also available. This package also includes a program 
diskette, Apple III Confidence Program, for testing all aspects of the 
Apple III iacluding disk drives. 


No mention of new APPIE III products would be complete without mentioning 
the APPLE III ProFile a five megabyte Winchester type hard disk. This is 
also on display at most local Apple dealers. Business Basic and Pascal 
files can be intermixed on ProFile. 


Page 28 


Verbatim 


Flexible 
Disks 


Introducing DATALIFE flexible disks 
from Verbatim with seven improve- 
ments: 1) Every Verbatim disk meets or 
exceeds the most demanding of IBM, 
Shugart, ANSI, ECMA and ISO stand- 
ards: 2) Reinforcing hub rings on etery 
disk (except item nos. FO34, FO32 and 
FDD344); 3) An improved liner; 4) An 
advanced polishing technique; 5). A 
longer-lasting lubricant; 6) A thicker, 
more durable coating; 7) A 100% error- 
free certification backed up-by a full 

one year warranty. 


WNe-wibartss “* 


FOR THE APPLE COMPUTER 


Soft Box ...... dierearste's $ 31.50/Box of 10 
Plastic Box ...... weeee$ 32.50/Box of 10 


All minidisks have reinforcing hub rings 
for longer life and come with a one year 
guarantee. 


VERBATIM Head Cleaning Disks and Kits 


10 Cleaning Disks ........ ..- $ 20.00 
*Head Cleaning Kit ....... see $22.50 
(reusable) 


*For limited time, buy 10 disks and 
get kit free. (See corner below) 


HRERARARERAERRERERRRRRERRERRERER RERERERERRERERR EER ERERRRRREREERRERERAERERERERERERER ERE REREERERE 


OTHER ITEMS We Supply: 


We Can Supply The Computer or Word Processor At Your Office, Too. 


TO ORDER, PHONE US 


2715 Bissonnet #216 
Houston, TX 77005 
526-9666 


CT | 


aa 
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*Epson MX70/80 Ribbons 
*NEC Spinwriter Ribbons 
*Many Styles of Diskette Storage Systems 


(Add 6% Tax To Orders) e 
> 


The Apple 


Desk 


42'W x 26"D x 26"H Desk with tubular steel legs, 
‘sheet metal modesty panel and FORMICA laminate 
top. 
casters optional. 


Four adjustable leveling feet standard; 


Suggested Retail .. $ 278.00 
APPLE CLUB PRICE ......... $ 239.00 


AN IMPROVED BOOT UTILITY PROGRAM 
BY RICHARD PARRISH 


I had recently bought a language card and talked a friend of mine 
into doing the same. He wanted to expand the Capacity of 
Programs like Visicalc, but he wanted to still use his Integer 
Basic Firmware card for his kids who liked to play games in 
Integer BASIC without loading the language card. It had to be 
automatic for his kids to use. After looking through the DOS 
manual and some other references I came up with this program. It 
will first check to see if you have a language card, then check 
if it has already been loaded with a BASIC, even after a PR#4!. 
If the latter is the case, it will restore it, but if the card is 
empty it looks at slot four for a firmware card. If that is the 
case then the program will modify DOS to recognize it in slot 
four. If there is nothing in slot four it will load the language 
card with Integer BASIC. This Program was written in Applesoft 
but can be easily adapted to Integer BASIC or modified to take 
any language card, RAM or ROM, in any slot! 


Lines 1 through 7 POKE the language card finder into memory. The 
machine language code subroutine works by POKEing the slot number 
times 16 into memory location 771. Then a CALL 769 is done to 
execute the subroutine (line 18) which returns with a number at 
location 768 which must be PEEKed. If a PEEK (768) yields a zero 
then there is no language card in that slot, a 1 means an empty 
language card, and a 2 represents a loaded language card or 
firmware card. If you have any questions or want to convert this 
program to Integer BASIC then call me at 448-5952. 


12 END 
LIST 13 POKE 768,0: POKE 771,64: REM 
SLOT# TIMES 16 
1 TEXT + HOME :D$ = CHR# (13) + 14 GOSUB 18 
CHRS (4) 15 IF X% = 0 THEN PRINT "( NOW 
2 FOR I = 768 TO 820: READ J%: POKE LOADING LANGUAGE CARD )": GOTO 
I,J%: NEXT 19 
3 DATA 0,72,162,0,173,0,224,157, 16 IF X% = 2 THEN PRINT “INTEGE 
128, 192, 205, 0,224, 240, 24, 238 R BASIC IS AVAILABLE IN SLOT 
30 4" 
4 DATA 3,173,1,224,173, 1,224,201 17 POKE 42424,192: POKE 42432,19 
+9, 208, 14, 238, 0,3, 189,129,19 3! -soTo 20 
2,189,129 18 CALL 769:X% = PEEK (768): RETURN 
5S DATA 192,169,32,141,0,224,141, 
130,192,104, 96,0,0,0,0,0,0 19 X% = PEEK ( - 16255) + PEEK 
& PRINT "UNIVERSAL BOOT UTILITY ( — 16255): PRINT D$"BLOAD I 
pos 3.3" NTBASIC, ASDAQ00" 
7 POKE 42424,128: POKE 42432,129 20 X% = PEEK ( — 16254): GOTO 22 
: POKE 768,0: POKE 771,0 
8 GOSUB 18 21 PRINT “INTEGER IS READY...": GOTO 
9 IF X% = 0 THEN 12 20 
10 IF X% = 1 THEN 13 22 END 
11 IF X% = 2 THEN 21 
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FIWARE SALE: es 
ocpata Capture 4.0 intelligent terminal eee gees eee 
dataCope Single Disk Sort ver 2.0, DOS 3.2, 
datacone Text File Copy ver 1.0, DOS 3.2, $25. (both for $40) 
Super Invader (tape), $10 
Dan's Disk Utility + Single Disk Copy, DOS 3.2, both for $10 
Escape, by Muse. Try to escape from the maze. Tape. $6 
Maze Game, by Muse. (tape) More escape. Both for $10 
Electronic Index Card File, tape, but works on disk. DBMS. $10 
Electric Crayon, by Muse. (tape) 18-color, bones drawing. $8 
U-Draw, by Muse. (tape) HIRES drawing. : 
Screen Machine, by Softape (tape) Powerful HIRES utility. $15 
Bomber! (tape) Bob Bishop.. A HIRES classic. $8 
Golf, by Instant Software (tape) LoRes. $8 
The games are excellent for children or for new Apple users. 
Call Ed Seeger, 723-6919. All software is original. 


F Es F ? 
seg ae by Datasoft, Inc. A Full LISP interpreter, with 
editor, prettyprinter, manual, "Towers of Hanoi demonstration 
program. This is a recursive language, often applied to so- : 
called "Artificial Intelligence" work. No problems with it, I'm 
just using a different and much more expensive LISP these days. 
$75.00 Ed Seeger, 723-6919. 


BY 


EXTEND THE POWER OF APPLESOFT 
WITH FOUR NEW & POWERFUL COMMANDS 


ARRAY SORTING - Sort any single dimensioned (or multi-dimensioned-indirectly) integer, real, or string array. Unparalelled sorting speeds are ac- 


SORT complished by a unique machine code and does not use any scratch arrays or additional memory. A typical sort time for a 1000 item array is 3.5 
seconds. Sort options include: create a record array, reverse sort, subrange sort, and a sort activity indicator. 


ROM ARRAY DELETION - Unused arrays, which can consume large amounts of memory space, can be deleted to free up memory or allow a previously 
TM dimensioned array to be redimensioned $3: 


WORD PROCESSING - A powerful and versatile system which will properly format your program's output on your monitor or printer. You get all the 

Commands of a dedicated word processor plus the power of Applesoft’s commands. Define or change printing margins, page width, age length, text 

FORM. AT Centering, right and lett justification, indenting and outdenting, etc., with simple basic commands. By combining the commands of the format ROM 
ROM and Applesoft you can print more than one copy with a for-next loop or insert different information with input commands or take it from your existing 

arrays. 

™ 


PRINT...USING will tabulate, right justify, line up all decimal points, pad the right and left side of Alpha/Numerical data with any predefined 
character, insert commas, and can be used within formulas or equations which will then format the mathematical result E 


FORMAT ROM AND SORT ROM will support all printers. 80 column boards, lower case adapters, and requires 48K, FP in ROM, DOS 3.2 or 3.3, M.C.'s ROMPLUS* or Andromeda's 
ROMboard* SAVE MONEY BY ORDERING THE FORMAT ROM AND SORT ROM AS A SET 


OTHER ROMS AVAILABLE: All ROMS are compatible with MC’s Romplus or Andromeda’s ROM Board. 
- DUAL DOS ROMS - Switch from one DOS (3.2 or 3.3) to the other without booting . . 

- FP RENUMBER/MERGE ROM - Apple Computer's infamous renumber program . . 

- BASICS ROM - Will boot standard, special, and dedicated 13 sector disks 

- FP EDITROM - Global search, change, and remove. (Works jointly with PLE). 

- COMMAND ROM - Catalog Command Menu and Disk Map .. . 


(Check or M0.) Viea or MasterCard Accopted 
Sort CTRL SYSTEMS, 80x 599, WEST MILFORD, NJ 07480 204-728-8750 


“REGISTERED TRADEMARK 
ALL FIRMWARE IS COPYRIGHTED 
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DISK COPYING PROBLEMS 
BY 
Richard Davis 


At the January 31,1982 H.A.A.U.G. meeting I had six disks copied 
from the club library. Of the six disks only one was readable on 
my Apple. A little research reveals the Probable cause and a 
simple solution. 


The copies were made with COPY II PLUS which is a good fast copy 
program but it must be used properly to achieve satisfactory 
results. 


I will refer to a first generation copy (or disk) as one that has 
been initiated and then had data added by COPYA, FID, SAVE, 
BSAVE, etc. These disks all have a standard format that includes 
synch marks, Address Field Headers ¢ DS AA AD ) and Trailers ( DE 
AA EB ) with the address information and the data between the 
respective headers and trailers. The gaps between Address Field 
Trailers and Data Field Headers have a few synch marks (minimum 
is about 5) while the gaps between the Data Field Trailers and 
Address Field Headers have more synch marks, usually quite a few 
more. These can easily be observed by using a program listed in 
“RENEATH APPLE DOS" by Don Worth and Pieter Lechner (Quality 
Software). 


COPY II PLUS uses these headers and synch marks to get oriented 
for making a copy and initiates and writes the track all at one 
time. However, the distribution of synch marks is much different 
on a second generation copy (when compared to a first generation 
copy). However, there is still sufficient information for the 
disk to be read an used by DOS, COPYA, FID, etc. 


When COPY II PLUS is used to make a third generation copy from a 
second generation copy the degradation of synch marks is so great 
that the third generation copy is seldom useable. There is 
usually no indication that the copy has been unsuccessful until 
one attempts to use the third generation copy. A nibble dump of 
the third generation disk shows large blocks of garbage without 
headers (probably because the copy program did not get in synch) 
and large blocks of synch marks. On one third generation copy we 
were even able to find two sectors still intact and readable that 
had been present before the copy operation and should have been 
scratched or written over. In other words COPY II PLUS failed to 
write anything on these sectors. 


Cont’d. 
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COPYA will satisfactorily copy a second generation COPY II PLUS 
disk, creating a new first generation so the process can restart. 
All that is needed for the H.A.A.U.G. Library sessions is to be 
sure that all the source disks used are first generation disks 
created with one of the programs that Properly initiates the 
disk. Then the QUICK (and dirty) COPY II PLUS can be used at the 
copy sessions satisfactorily. 


It should be noted that a COPY II PLUS copy using the "Standard 
Header Option" seems to build a satisfactory third generation 
copy but we have not tested beyond that point. We use Version 
2.2 of COPY II PLUS . Later versions may not be the same. 


I am aware that our disk drives do not run at the same speed and 
suspect that this may aggravate the problem. However the speed 
difference does not bother any other operations. Nibble dumps of 
the unreadable copies from the library showed the same pattern as 
our third generation copies. 


Time II 


The most powerful, easiest to use, corte is your APPLE 


« TIME IN HOURS, MINUTES AND SECONDS. 

* DATE WITH YEAR, MONTH, DATE, DAY OF WEEK AND 
LEAP YEAR. 

« FAST DATE AND TIME SETTING, 

* PROGRAM SELECTABLE 24 HOUR MILITARY FORMAT 
OR 12 HOUR WITH AM/PM FORMAT. 

* +30 SECOND ADJUST. 

*DIP SWITCH SELECTABLE INTERRUPTS PERMIT 
FOREGROUND/BACKGROUND OPERATION OF TWO 
PROGRAMS SIMULTANEOUSLY SO YOU CAN CALL UP 
SCHEDULES, TIME EVENTS, DATE LISTINGS, AND 
OTHER PRINTOUTS. 


* CRYSTAL CONTROLLED FOR .0005% ACCURACY. 


*LATCHED INPUT AND OUTPUT PORTS FOR THE 
EASIEST PROGRAMMING IN BASIC. 


* ON BOARD BATTERY BACKUP POWER FOR OVER 4 
MONTHS POWER OFF OPERATION (BATTERY 
CHARGES WHEN APPLE IS ON). 


ALL ORDERS SHIPPED SAME DAY 
SEND $129.00 CHECK OR MONEY ORDER 
(TEXAS RESIDENTS ADD 5% SALES TAX) 


APPLIED ENGINEERING 
P.O. BOX 470301 
DALLAS, TEXAS 75247 


* INCLUDES 16 SECTOR DISK WITH OVER 25 CON- 
TRIBUTED PROGRAMS SO YOU CAN PUT YOUR TIME II 
TO USE RIGHT AWAY. 


* TWENTY-THREE PAGE OPERATING MANUAL 
INCLUDED, WITH MANY EXAMPLES OF PROGRAMS TO 
USE WITH YOUR APPLE IN ANY CONFIGURATION. 


MASTER CHARGE & VISA WELCOME 


(214) 492-2027 Gee 


7:00 AM - 11:00 PM 7 DAYS A WEEK 


APPLE PERIPHERALS ARE OUR ONLY BUSINESS 
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PRINT AT 


By: D. Van Hoozer 


The *PRINT AT’ subroutine on the following page is the first 
cut version of a more extensive print formatting system which 
includes implementation of the *PRINT USING’ function for 
Applesoft. ’PRINT AT’ is‘used for moving the cursor to a specific 
spot on the Apple JC screen. 


I used Bob’s S-C Assembler to code the source, but if you do 
not have an assembler you can still use the subroutine by copying 
the POKE statements listed below. I used Kramer’s POKE maker to 
generate them. For information on the POKE maker see Kramer’s 
article in the previous issue. 


There is at least one modification that I would recommend 
making. At line 1290 there is a JSR FP.CHRGET instruction which 
could be changed to: 


JSR FP.CHRCLS /* CHECK FOR 7)” &/ 
JMP FP.PRINT /* GOTO TO THE FP PRINT ROUTINE *%/ 


Delete the RTS at 1300. It’s not needed. 


This modification allows you to append normal print stuff 
after the last ”)’ thus doing away with a couple more keystrokes. 


ILIST 


5 HOME 

10 FOR XxX = 768 TO 799 

20 READ EYTE: POKE XX,BYTE 

BO NEXT Xx 

40 DATA 32,187,222,32,123,221,3 
2,251,230, 202, 134,37, 32, 34,2 
52,532,190, 222,32,123, 221,32, 
251, 230, 202, 134, 36,32, 177,0, 


96,0 

50 & (6,4): PRINT "ROW 6, COLUMN 
4" 

60 END 
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NEW LOW PRICE 


DIRECT FROM MANUFACTURER 
$120.00 


‘Lh 


yerrverwe *\ 


16K RAM EXPANSION BOARD 
FOR THE APPLE II* $120.00 


The Anc da 16K RAM Expansion Board Now with One Year Warranty. 


allows your Apple to use RAM memory in place 
of the BASIC pau ge ROMs giving you up ANDROMEDA 
le Separe 


‘ds are nc 
on Board 


INCORPORATED 
with the Micro alc Greensboro, NC. 27410 
. Pascal, Fortra ot A 919 852-1482 P.O. Box 19144 
C cts either meme) Price for Andromeda 16K RAM 
the RAM lang O n ROMs ¥ b only $120.00. 
when t your Apple a pe: d or shipping and 


e Andromeda 16K RAM Expansion handling lina residents 
AS ¢ a pi =n reco eliability with eau? 4% 
i Me 


*DEALER INQUIRIES WELCOME 


SYMBOL TABLE 


DEBS- FP.CHECLS 
FP.CHECOM 
FP. CHEOPN 
FP. CHRGET 
FP,CONINT 
FP.FRMEVL 
MOM .CH 

MON. C' 
Mon 


JPREG 
TPCHRE( 93 


;" 300" 


1406 
1416 
1428 
1436 
in4a 
1456 
148 
1878 
ise 
1898 
1166 
1116 
1128 
1138 
1146 
1156 
1168 
11768 
1188 
1198 
1286 
1216 
1228 
1238 
1246 
1258 
1246 
1278 
1286 
1298 
13868 


PRI 
BY 


FP.CHRGET 
FP.FRMEVL 
FP.CHKCLS 
FP. CHKOPN 
FP.CHKCOM 
FP.CONINT 
MOM. CH 
MON .CM 
MON .UTAB 
x 


¥ 


x 


2 FP.CHEOPN “xIS IT A 


2 FP. CONINT 


2 FP.CHRGET 


NT AT 
DB. VAN HOOZER 


-EQ $80B1 
-EG €0D76 
DEBS 
1 $DEBB 
DEBE 
SESFB 
$24 

$25 


) $FC22 


OES 
“#GET THE ROWE 
“RCONVERT TO INTEGERE< 
“*ADIUST FOR OFFSETH/ 


FP. FRMEVL 


© MON. CM 


MON.VTAB  /xGOTO THE RIGHT ROW” 
FF.CHKCOM 
FP. FRMEVL 
FP. CONINT 


“#15 THE NEXT CHAR A COMMA?x/ 

“2GET THE COLUMN’ 

“XCONVERT TO INTEGERS” 

“RADIUST OFFSETES 

“ESET HORT ZONALS/ 

fRADIUST TO POINT AT NEXT CHARACTERS- 


MON. CH 


JLOAD PRINT AT.TEST 
]POKE32, 33 


JLIST 

5S R= 1@:0 = 5 

1@ PORE 1613,76: REM JMP 

26 POKE 1814, 

3G POKE 1815,3 

46 HOME 

S@ & €5,5): PRINT "ROW 5 COLUMN 5" 

46 1,1): PRINT "ROW 1 COLUMN 1" 

78 & CR,C): PRINT "ROW #"5R3" COL #"3C 
BG FOR R= 11 70 19 

vac=C+i 

1G & ¢R,C): PRINT "HELLO AT ¢"sRe" "30309" 
11@ NEXT R 

999 END 

IPR#A 
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IGALL=-151 


OF 
5 


onan ncn on 


anon on an 


See if you can figure what this is all about. 
Call the Hotline if you, do. 


2317? 


ho ud 


hk 
Bia 


hon Bon onan on 
Pontoon’ 
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#5178. 


S178- 4€ 59 
51ge- 
5188-52 
5190- 
5198- 
S1aa- 
S1Ag~ 
S16G- 
S1B8- 
S1ice- § 
S1ice~ 
51Da- 
51De- 
S1eG- & 
S1Es- 
S1Fe- 
S1FS- 


JLIST 
1G A= Z516 

20D = PEEK (AD 

36 1F > = @ THEN END 
4g POKE A,0 + 16 

Sa asa+t 

68 GOTO 28 

JPRHG 

WLLST 

16 A = 2A516 

28 DP = PEEK (AD 

34 IF D = @ THEN END 
48 AS = CHRE oh - 16 
45 PRINT 4%; 


S84 A=A + 1 
46 GOTO 2a 


JPRHE 


™ MOORE 
OMPUTER SUPPLIES 
CATALOG 


OUR NEW CATALOGS ARE IN! WE NOW HAVE THE MOST COMPREHENSIVE COMPUTER SUPPLIES CATALOG IN 
THE INDUSTRY! COME IN TO PICK YOURS UP AND TO CLAIM YOUR 10% HAAUG DISCOUNT. 


A reminder: We now carry Roytype ribbons for 
MOO. OORE the Epson MX70 & MX80. MX100 ribbons 


PAY AN wtll be in in April. 
MOORE BUSINESS Everything from coding sheets to computer furniture! 
CENTER 


Business Forms « Computer Supplies 1120 Smith Street / Houston, TX 77002 / (713) 237-9063 
Business Equipment - Instant Printing 10% DISCOUNT TO H.A.A.U.G. MEMBERS 
CALL FOR ARTICLES 


Articles and program listings should be submitted in hardcopy 
form, and, if possible, on disk in Applewriter, Professional 
Easywriter, Palantir, or Pascal compatible files. If not 
submitted on disk, articles must be free of typing or spelling 
errors as they cannot be retyped. Diskettes will be returned to 
the author provided his name and address are on them. Printed 
material should be printed using normal size characters, a new 
ribbon and enhanced print if your printer is so equipped. 
Margins should be set at 10 and 70 for articles. Listings should 
be printed in 40 column mode and may be printed\ in compressed 
print. Thermal paper should be avoided because it does not 
reproduce well. Articles should be submitted to: 


Houston Area Apple Users Group 
Apple Barrel 


2218 Running Springs 
Kingwood, TX 77339 


ADVERTISING RATES 
FULL PAGE HALF PAGE QTR PAGE 8TH PAGE BUS. CARDS 
$50 $28 $18 $10 $5 
Advertisements should be submitted in camera ready form to 
H.A.A.U.G., 2218 Running Springs, Kingwood, TX, 77339, by the 


10th of the month. Charges will be billed and accompanied by a 
copy of the Apple Barrel containing the ad. 
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HAAUG MEMBERSHIP SURVEY 


First Name Init. Last Name Home Phone 
Street Address Apt.# City State Zip 
Occupation Company Work Phone 
Business Address City State Zip 
Prefer Mail To: Home / / Work / / 
Ages of children using your Apple? ------------ 


Childrens’ areas of interest? 


SPECIAL INTERESTS (Check all that apply) 


Science/Engingering 
Business Applications 
CP/M 

Education 

Assembly Language 
Pascal 

FORTRAN 

Music 

Real Time Applications——— 
OTHER 


Games/Puzzles 

Data Base Systems 
Modems/Communications 
Hardware 

BASIC 

Forth 

Graphics 

Stock Market 

bos 


CLUB PARTICIPATION AREAS (Check where you want to help) 


Write articles for Apple Barrel 
Help prepare Apple Bbl for mail 
Evaluate programs for library 
Help run program copy session 
Coordinate hardware projects 
Present lectures or tutorials 
Assist in new member orientation 
Copy starter kit disks/tapes 
Hold office in club 


The HAAUG Membership survey 


Maintain hardcopy library 

Write programs for library 
Maintain program library 

Bring Apple to copy session 
Coordinate group purchases 
Arrange vendor presentations 
Assemble and label starter kits 
Xerox starter kit material 
Other 


Provides a data base for use in 


getting members with similar interests together and in finding 
those who are willing to help in the running of the club. 
Please send in the completed form to the address below or hand 
it in at the meetings to the new member chairman. 


MIKE KRAMER 
2218 RUNNING SPRINGS 


KINGWOOD, TX 


77329 


Ms 


INTERNATIONAL PERSONNEL SERVICES 


I. P. S. functions as a Personnel and Executive Search Agency 

in Engineering, Financial, Administration, and Data Processing 
Diciplines with both domestic and foreign positions. We would 

be happy to discuss our services with you as a client firm or 

for placement. Feel free to call us or look for us at the Satur- 
day H.A.A.U.G. meetings and we will put our Apple to work for you. 
"IPS- the computerized placement vrofessionals." 


Darrell Raithel J. Back 
Senior Associate Senior Associate 


NAME: SALARY: 


HOME PHONE: OFFICE PHONE: 


HARDWARE: 


SYSTEMS: 


LANGUAGES: 


APPLICATIONS: 


INDUSTRIES: 


POSITIONS HELD: 


For paid placement evaluation, please use this tear out form or 
send resume to International Personnel Services, 50 Briar Hollow 
East, Suite 620, Houston, TX 77027. 


50 Briar Hollow East, Suite 620 Houston, Texas 77027 (713) 871-1600 


Houston Area Apple Users Group 
APPLE BARREL 
2218 Running Springs 
Kingwood, TX 77339 
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